﻿Public Class AngriffstabelleScharfschützengewehr
    Inherits Angriffstabelle
    Public Sub New()
        INF = 100
        MECH = 100
        SSIEINHEIT = 100
        JGPZ = 5
        KPZ = 2
        TITANPZ = 0
        MEGAPZ = 0
        SPÄHER = 10
        FLAK = 4
        MISSILE = 25
        ART = 15
        RKW = 25
        LÄUFER = 5
        TTP = 20
        HÖLLIUM = 15
        THELI = -1
        KHELI = -1
        Gebäude = 1
        ABPZ = 7
        TTLÄUFER = 20
        HOVERCRAFT = 1
        DREADNAUGHT = -1
        BAUPANZER = 20
        TRITON = -1
        VERSORGUNGSSCHIFF = -1
        V3Raketenwerfer = 25
        HOVERFLAK = 3
        SCHWERESHOVERCRAFT = 1

        MOTORRAD = 100
        FLARE = 15
        PANZERABWEHRKANONE = 15
        WASSERFLUGZEUG = -1
        KANONENBOOT = -1
        Select Case My.Settings.CommanderWarsGameMoodus
            Case CommanderWarsGameModi.AdvanceWarsDC
                MOTORRAD = 100
                FLARE = 15
                PANZERABWEHRKANONE = 15
                WASSERFLUGZEUG = -1
                KANONENBOOT = -1
            Case CommanderWarsGameModi.CommanderWars2

                'Infantrie
                INF = 120
                MECH = 120
                SSIEINHEIT = 120
                MOTORRAD = 120
                'Panzer
                FLAK = 1
                JGPZ = 1
                SPÄHER = 20
                KPZ = 1
                TITANPZ = 1
                MEGAPZ = 1
                TTP = 10
                ART = 5
                RKW = 10
                MISSILE = 10
                BAUPANZER = 10
                PANZERABWEHRKANONE = 20
                'Luftwaffe
                BOMBER = -1
                KHELI = 8
                THELI = 10
                JÄGER = -1
                WASSERFLUGZEUG = -1
                AUFKLÄRER = -1
                'Seewaffe
                UBOOT = -1
                ZERSTÖRER = -1
                KREUZER = -1
                SCHLFF = -1
                FLTR = -1
                LBOOT = -1
                'Gebäude
                Gebäude = 1
        End Select
    End Sub
End Class
